home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Utilities / db / Examples / ARexxDemos / multiview.db < prev    next >
Encoding:
Text File  |  1996-01-01  |  318 b   |  17 lines
  1. /* Rexxprogram for db that passes data in the current field to multiview */
  2. /* By David Ekholm */
  3.  
  4. Options Results
  5. BLOCKINPUT
  6. GETFIELD
  7. file = RESULT
  8. IF RC = "0" THEN DO
  9.     IF EXISTS(file) THEN
  10.         ADDRESS COMMAND "run >nil: Multiview " '"'file'"'
  11.     ELSE
  12.         OKAY1 "`"file"' does not exist."
  13. END
  14. FREEINPUT
  15.  
  16.  
  17.